home *** CD-ROM | disk | FTP | other *** search
Text File | 1993-07-21 | 4.5 KB | 108 lines | [TEXT/ScoM] |
- (lib-drum track1 '(b hd zb = d = zb = b = zbh = hd h b t b dh bz = d = bz = b = hbz = dh h b t))
- (lib-drum track2 '(b cd cb = d = cb bc b c cb = d = b t b cd bc = d = bc cb b c bc = d d b t))
- (lib-drum track3 '(b cd cb = rd s tcb sbc rb rc scb t d = b t b cd bc = td s rbc rcb sb tc tbc s rd d b t))
- (lib-drum track4 '(ub thd tzb u d = fzb f ub = zbh = hd h b = ub fh fbz = ud t tbz u b = hbz = dh rh rsqb r))
- (lib-drum track5 '(bhf hf h hf hd hf bh hc bh h f{eh e{h hd h bk hd fbh fh h fbh hd fh cbh hc bh h h rh shd rhd srbk sh))
- (lib-drum track6 '(hfb hd hfb hf id h hfb hb he heb ie hd h hb h hfb hd hbf he hd hb he hb hrb hq hq hp d hb h hb =))
- (lib-drum track7 '(pb { fz = bzd { fzc pc zbu p{ ud { bd d c cd p { fz = bdz { fcz cbp ubz {p d { bf = c cb))
-
- (comment
-
- ; ---- track1
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "- - - - - - - - - - - - " (b)
- beat2 1/16 " - - - - - - " (d)
- beat3 1/16 " - - -- - - -- " (h)
- beat4 1/16 " - -" (t)
- beat5 1/16 " - - - - - - " (z)
- )
-
- ; ---- track2
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "- - --- - - - - --- - - " (b)
- beat2 1/16 " -- -- -- -- -- -- " (c)
- beat3 1/16 " - - - - - -- " (d)
- beat4 1/16 " - -" (t)
- )
-
- ; ---- track3
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "- - --- - - - - --- - - " (b)
- beat2 1/16 " -- -- -- -- -- -- " (c)
- beat3 1/16 " - - - - - -- " (d)
- beat4 1/16 " - -- -- - " (r)
- beat5 1/16 " - - - - - - " (s)
- beat6 1/16 " - - - - -- -" (t)
- )
-
- ; ---- track4
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "- - - - - - - - - - - - " (b)
- beat2 1/16 " - - - - - " (d)
- beat3 1/16 " -- -- " (f)
- beat4 1/16 " - - -- - - -- " (h)
- beat5 1/16 " - " (q)
- beat6 1/16 " ---" (r)
- beat7 1/16 " - " (s)
- beat8 1/16 " -- -- " (t)
- beat9 1/16 "- - - - - - " (u)
- beat10 1/16 " - - - - - - " (z)
- )
-
- ; ---- track5
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "- - - - - - - - - " (b)
- beat2 1/16 " - -- " (c)
- beat3 1/16 " - - - - -- " (d)
- beat4 1/16 " -- " (e)
- beat5 1/16 " - " (f)
- beat6 1/16 "-------------- --------------- -" (h)
- beat7 1/16 " - - " (k)
- beat8 1/16 " - -- " (r)
- beat9 1/16 " - --" (s)
- beat10 1/16 " -- " ({)
- beat11 1/16 "-- - - -- - - " (f)
- )
-
- ; ---- track6
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 "- - -- - - - - - -- - - " (b)
- beat1 1/16 " - - - - - - " (d)
- beat2 1/16 " --- - - " (e)
- beat3 1/16 "---- ----- ---------------- --- " (h)
- beat4 1/16 " - - " (i)
- beat5 1/16 " - " (p)
- beat6 1/16 " -- " (q)
- beat7 1/16 " - " (r)
- beat8 1/16 "- -- - - - " (f)
- )
-
- ; ---- track7
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat2 1/16 "- - - - - -- - -" (b)
- beat3 1/16 " -- -- -- --" (c)
- beat4 1/16 " - - -- - - - " (d)
- beat5 1/16 " - - - - - " (f)
- beat6 1/16 "- - - - - - " (p)
- beat7 1/16 " - - - " (u)
- beat8 1/16 " - - - - - - - - " (z)
- beat9 1/16 " - - - - - - - - " ({)
- )
- )
-
-
-